From: Richard M. Stallman <rms@gnu.org>
Date: Thu, 17 Feb 1994 19:04:07 +0000 (+0000)
Subject: (mail-mailer-swallows-blank-line): Fix regexp typo.
X-Git-Tag: archive/raspbian/1%29.2+1-2+rpi1^2~5^2~93084
X-Git-Url: https://dgit.raspbian.org/%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:///%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:/?a=commitdiff_plain;h=5a85300527c0f1dce554683201de59acbcdfacde;p=emacs.git

(mail-mailer-swallows-blank-line): Fix regexp typo.
Check for apparent header line as well as for leading whitespace.
---

diff --git a/lisp/mail/sendmail.el b/lisp/mail/sendmail.el
index 4325ce4950f..e0fa000fef4 100644
--- a/lisp/mail/sendmail.el
+++ b/lisp/mail/sendmail.el
@@ -137,9 +137,9 @@ so you can edit or delete these lines.")
 		   (insert-file-contents "/etc/sendmail.cf")
 		   (goto-char (point-min))
 		   (let ((case-fold-search nil))
-		     (re-search-forward "^OR\>" nil t)))
+		     (re-search-forward "^OR\\>" nil t)))
 	       (kill-buffer buffer))))
-      '(looking-at " \t"))
+      '(looking-at " \t\\|[-a-zA-Z]+:"))
   "Set this non-nil if the system's mailer runs the header and body together.
 \(This problem exists on Sunos 4 when sendmail is run in remote mode.)
 The value should be an expression to test whether the problem will